home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
sviewii
/
arexx-scripts
/
setsvdriver.rx
< prev
next >
Wrap
Text File
|
1999-06-15
|
956b
|
54 lines
/*
$VER: SetDriver.rx V8.00 (22.7.98)
© 1993-98 by Andreas R. Kleinert
This script demonstrates how to modify the global SVDriver preferences
by using SViewII's ARexxPort.
The resulting changes will also appear on SViewII's GUI,
if already open.
*/
address command
SViewII "-INSTALL_APPMENU=FALSE -INSTALL_APPICON=FALSE"
say ""
say "ARexx: SViewII has been started : Waiting a moment..."
wait 5
OPTIONS RESULTS
SIGNAL ON ERROR
SVIIPORT = 'SViewII.rx'
SVNGPORT = 'SViewNG.rx'
SVPORT = 'SuperView.rx'
IF ~SHOW('P',SVPORT) THEN SVPORT = SVNGPORT
IF ~SHOW('P',SVPORT) THEN SVPORT = SVIIPORT
IF ~SHOW('P',SVPORT) THEN DO
say "Could not locate ARexx port of SViewII !"
CALL ErrorOut 0
END
ADDRESS VALUE SVPORT
'SVDRIVER=ECS ScreenDriver'
address command wait 5
'SVDRIVER=AGA ScreenDriver'
CALL ErrorOut 0
/* Errorout procedure ----------------------- */
ErrorOut:
PARSE ARG ExitCode
EXIT ExitCode
END